home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / nt / emacssrc.zip / EMACSSRC.TAR / emacs-19.17 / oldxmenu / error.c < prev    next >
C/C++ Source or Header  |  1993-03-09  |  694b  |  31 lines
  1. #include "copyright.h"
  2.  
  3. /* $Header: /u/src/emacs/19.0/oldXMenu/RCS/Error.c,v 1.1 1992/04/11 22:10:18 jimb Exp $ */
  4. /* Copyright    Massachusetts Institute of Technology    1985    */
  5.  
  6. /*
  7.  * XMenu:    MIT Project Athena, X Window system menu package
  8.  *
  9.  *     XMenuError -    Returns a string description of the current
  10.  *            XMenu error status flag.
  11.  *
  12.  *    Author:        Tony Della Fera, DEC
  13.  *            August, 1985
  14.  *
  15.  */
  16.  
  17. #include "XMenuInt.h"
  18.  
  19. char *
  20. XMenuError()
  21. {
  22.     char message[128];        /* Error message buffer. */
  23.  
  24.     if ((_XMErrorCode < XME_CODE_COUNT) && (_XMErrorCode >= 0)) {
  25.     return(_XMErrorList[_XMErrorCode]);
  26.     }
  27.     sprintf(message, "Unknown _XMErrorCode: %d", _XMErrorCode);
  28.     return(message);
  29. }
  30.  
  31.